home *** CD-ROM | disk | FTP | other *** search
- object FormObserverEdit: TFormObserverEdit
- Left = 320
- Top = 355
- BorderStyle = bsDialog
- Caption = 'Edit'
- ClientHeight = 91
- ClientWidth = 336
- Color = clBtnFace
- Constraints.MaxHeight = 118
- Constraints.MaxWidth = 344
- Constraints.MinHeight = 118
- Constraints.MinWidth = 344
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poDefaultPosOnly
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Label4: TLabel
- Left = 4
- Top = 8
- Width = 39
- Height = 13
- Caption = '&Quantity'
- end
- object Label6: TLabel
- Left = 4
- Top = 36
- Width = 60
- Height = 13
- Caption = '&Current price'
- end
- object Label7: TLabel
- Left = 4
- Top = 64
- Width = 63
- Height = 13
- Caption = 'Current value'
- end
- object btnDone: TButton
- Left = 252
- Top = 60
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Done'
- Default = True
- ModalResult = 1
- TabOrder = 0
- OnClick = btnDoneClick
- end
- object eValue: TEdit
- Left = 120
- Top = 60
- Width = 81
- Height = 21
- Enabled = False
- TabOrder = 1
- Text = 'eValue'
- end
- object ePrice: TEdit
- Left = 120
- Top = 32
- Width = 81
- Height = 21
- TabOrder = 2
- Text = 'ePrice'
- end
- object eQty: TEdit
- Left = 120
- Top = 4
- Width = 81
- Height = 21
- TabOrder = 3
- Text = 'eQty'
- end
- object sbPrice: TScrollBar
- Left = 208
- Top = 34
- Width = 121
- Height = 16
- LargeChange = 100
- Max = 10000
- PageSize = 0
- TabOrder = 4
- OnChange = sbPriceChange
- end
- object sbQty: TScrollBar
- Left = 208
- Top = 6
- Width = 121
- Height = 16
- LargeChange = 10
- Max = 1000
- PageSize = 0
- TabOrder = 5
- OnChange = sbQtyChange
- end
- end
-